home *** CD-ROM | disk | FTP | other *** search
/ Micromanía: 150 Juegos 2010 / 150Juegos_16.iso / Shareware / Juegos Flash / canyonZone.dcr / Internal_3_endScreenManager.ls < prev    next >
Encoding:
Text File  |  2003-08-01  |  1.9 KB  |  83 lines
  1. property pWinner, pWinMember, pLoseMember, pLoseSounds, pWinSounds, pTimeMember
  2. global gMainManager
  3.  
  4. on new me
  5.   pWinMember = member("winscreen")
  6.   pLoseMember = member("losescreen")
  7.   pTimeMember = member("timemember")
  8.   pLoseSounds = [member("RG42IN01", "sfx"), member("RG42IN02", "sfx"), member("RG42IN03", "sfx")]
  9.   pLoseSounds = [member("RG42IN02", "sfx"), member("RG42IN03", "sfx")]
  10.   pWinSounds = [member("RG41IN01", "sfx"), member("RG41IN02", "sfx"), member("RG41IN03", "sfx")]
  11.   return me
  12. end
  13.  
  14. on start me
  15.   the updateLock = 1
  16.   go("endscreen")
  17.   case pWinner of
  18.     0:
  19.       sprite(1).member = pLoseMember
  20.       sound(1).play([#member: pLoseSounds[random(pLoseSounds.count)]])
  21.     1:
  22.       sprite(1).member = pWinMember
  23.       sound(1).play([#member: pWinSounds[random(pWinSounds.count)]])
  24.   end case
  25.   sound(1).queue([#member: member("RG41HP01", "sfx")])
  26.   the updateLock = 0
  27.   cursor(-1)
  28. end
  29.  
  30. on leave me
  31. end
  32.  
  33. on setWinner me, tState
  34.   pWinner = tState
  35. end
  36.  
  37. on setTime me, tTime
  38.   if tTime = #empty then
  39.     pTimeMember.text = EMPTY
  40.   else
  41.     if voidp(externalParamValue("sw1")) = 0 then
  42.       tArgs = [#game: 2, #score: tTime]
  43.       postNetText(externalParamValue("sw1"), tArgs)
  44.     end if
  45.     tTime = tTime / 1000.0
  46.     tMinutes = floor(tTime / 60)
  47.     tSeconds = floor(tTime - (tMinutes * 60))
  48.     tFraction = tTime - (tMinutes * 60) - tSeconds
  49.     tFraction = integer(tFraction * 100)
  50.     pTimeMember.text = "Final Time :" & RETURN & padd(tMinutes) & ":" & padd(tSeconds) & ":" & padd(tFraction)
  51.   end if
  52. end
  53.  
  54. on padd tNumber
  55.   t = string(tNumber)
  56.   if t.char.count = 2 then
  57.     return t
  58.   end if
  59.   return "0" & t
  60. end
  61.  
  62. on floor tNumber
  63.   i = integer(tNumber)
  64.   if i < tNumber then
  65.     return i
  66.   else
  67.     return i - 1
  68.   end if
  69. end
  70.  
  71. on exitGameClicked me
  72.   externalEvent("exit")
  73. end
  74.  
  75. on startGameClicked me
  76.   t = gMainManager.getManager(#track)
  77.   GLOBAL_startDesertZone()
  78. end
  79.  
  80. on Update me
  81.   nothing()
  82. end
  83.